home *** CD-ROM | disk | FTP | other *** search
/ Delphi Informant Complete 1995 - 2000 / Delphi Informant Complete 1995 to 2000.iso / Delphi Informant Magazine Complete Works SOURCE CODE 1998.rar / 1998 / Jul / DI9807BL / Intf / Server / ChatServer.dpr < prev    next >
Encoding:
Text File  |  1998-05-08  |  795 b   |  30 lines
  1. { *****************************************************************************
  2.   Implementing COM Component Callbacks in Delphi
  3.   Code written for Delphi Informant publication
  4.  
  5.   Comments, questions, suggestions?
  6.   Binh Ly, Systems Analyst (bly@brickhouse.com)
  7.   Brickhouse Data Systems (http://www.brickhouse.com)
  8.   *****************************************************************************
  9. }
  10. program ChatServer;
  11.  
  12. uses
  13.   Forms,
  14.   ComServ,
  15.   Dialogs,
  16.   MainFrm in 'MainFrm.pas' {frmMain},
  17.   ChatServer_TLB in 'ChatServer_TLB.pas',
  18.   ChatConnection in 'ChatConnection.pas' {ChatConnection: CoClass},
  19.   ChatChannel in 'ChatChannel.pas';
  20.  
  21. {$R *.TLB}
  22.  
  23. {$R *.RES}
  24.  
  25. begin
  26.   Application.Initialize;
  27.   Application.CreateForm(TfrmMain, frmMain);
  28.   Application.Run;
  29. end.
  30.